home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 41.zip / BS1 part 41 / Crunchers pack v1.5.adf / loader.S < prev    next >
Text File  |  1978-10-22  |  1KB  |  64 lines
  1. LEA.L     L000003,A1
  2. MOVE.L    #$00000000,D0
  3. MOVE.L   $0004,A6
  4. JSR       -552(A6)
  5. MOVE.L    D0,L000004
  6. MOVE.l    $0080,D5
  7. LEA.L     L000005,A0
  8. L000001:
  9. MOVE.W    (A0)+,D0
  10. CMP.B     D0,D5
  11. BEQ       L000002
  12. ADDQ.L    #4,A0
  13. BRA.S     L000001
  14. L000002:
  15. MOVE.L    (A0),D1
  16. CLR.L     D2
  17. CLR.L     D3
  18. MOVE.L   L000004,A6
  19. JSR       -222(A6)
  20. MOVE.L   L000004,A1
  21. MOVE.L   $0004,A6
  22. JSR       -414(A6)
  23. CLR.L     D0
  24. RTS       
  25.                                  
  26.                                  
  27. L000003:
  28. dc.b "dos.library",0
  29.  
  30. L000004:
  31. DC.B  $00,$00,$00,$00
  32.  
  33. L000005:
  34. DC.B  $00,$00
  35. DC.L  L000006
  36. DC.B  $00,$01
  37. DC.L  L000007
  38. DC.B  $00,$02
  39. DC.L  L000008
  40. DC.B  $00,$03
  41. DC.L  L000009
  42. DC.B  $00,$04
  43. DC.L  L00000A
  44. DC.B  $00,$05
  45. DC.L  L00000B
  46. DC.B  $00,$06
  47. DC.L  L00000C
  48. DC.B  $00,$07
  49. DC.L  L00000D
  50. DC.B  $00,$08
  51. DC.L  L00000E
  52. DC.B  $00,$09
  53. DC.L  L00000F
  54.  
  55. L000006:dc.b "a",0
  56. L000007:dc.b "b",0,0
  57. L000008:dc.b "X c2",0
  58. L000009:dc.b "D",0
  59. L00000A:dc.b "E",0,0
  60. L00000B:dc.b "F",0
  61. L00000C:dc.b "G",0
  62. L00000D:dc.b "H",0
  63. L00000E:dc.b "I",0
  64.